home *** CD-ROM | disk | FTP | other *** search
/ Aminet 41 / Aminet 41 (2001)(Schatztruhe)[!][Feb 2001].iso / Aminet / util / virus / Safe.lha / Safe14.4 / InstallSafe next >
Text File  |  2000-10-29  |  5KB  |  99 lines

  1. ;Installation script for Safe
  2.  
  3. (set VER "v14.4")
  4.  
  5. (set PAR1 "")
  6. (set PAR2 "")
  7. (set PAR3 "")
  8.  
  9. (set YEP "Yes")
  10. (set NOP "No")
  11. (set NEED "Safe needs OS2.0+ !\n")
  12. (set WELC ("\n\n\n\nWelcome to Safe %s Installation Script.\n(c)1998-2000 by Zbigniew `Zeeball` Trzcionkowski\n\nThis script installs only Safe file\nand adds it to user-startup!" VER))
  13. (set WHER "Please select a place where you want to install Safe.")
  14. (set WHLP "Where do you want to have this!")
  15. (set CPNG "Copying Safe into ")
  16. (set ADDG "Adding Safe to \"S:User-Startup\".")
  17. (set AHLP "To check the system on startup!")
  18. (set QES1 "\n\n\nDo You want TCP Patch?")
  19. (set Q1HE "To detect activity of trojans/viruses that opens remote shells in TCP: device.")
  20. (set QES2 "\n\n\nDo You want Ram disk: renamer?")
  21. (set QES3 "\n\n\nDo You want to skip PolishPower test on startup?")
  22. (set Q2HE "Renaming Ram disk: to RAM: that helps with some programs.")
  23. (set Q3HE "Saves 16/50 of second while booting by not testing for PolishPower virus in memory which always appears with delay...")
  24. (set MESS "On important systems You are supposed to change by hand the name of Safe file to other name (especially without \"v\" and \"V\"). Have a nice day.")
  25.  
  26. (if (= @language "polski")
  27. (
  28. (set YEP "Tak")
  29. (set NOP "Nie")
  30. (set NEED "Safe potrzebuje OS2.0+ !\n")
  31. (set WELC ("\n\n\n\nWitaj w skrypcie instalacyjnym programu Safe %s!\n(c)1998-2000 by Zbigniew `Zeeball` Trzcionkowski\n\nTen skrypt instaluje tylko plik Safe-a\ni dodaje go do user-startup!" VER))
  32. (set WHER "Proszë wybraê miejsce, gdzie ma byê zainstalowany Safe.")
  33. (set WHLP "Gdzie go chcesz mieê!")
  34. (set CPNG "Kopiujë Safe-a do ")
  35. (set ADDG "Dodajë Safe-a do \"S:User-Startup\".")
  36. (set AHLP "Ûeby sprawdziê system na starcie!")
  37. (set QES1 "\n\n\nCzy chcesz TCP Patch?")
  38. (set Q1HE "Aby wykryê dziaîalnoôê wirusów/trojanów, które tworzâ zdalne shelle w urzâdzeniu TCP:")
  39. (set QES2 "\n\n\nCzy chcesz Ram disk: renamer?")
  40. (set QES3 "\n\n\nCzy chcesz pomijaê test na obecnoôê wirusa PolishPower w czasie bootowania?")
  41. (set Q2HE "Zmiana nazwy Ram disk: na RAM:, co pomaga przy pracy z niektórymi programami.")
  42. (set Q3HE "Zaoszczëdza 16/50 sekundy podczas bootowania dziëki rezygnacji z testu na wirusa PolishPower, który zawsze pojawia sië z opóúnieniem...")
  43. (set MESS "W waûnych systemach sugerujë rëcznâ zmianë nazwy pliku Safa na innâ (szczególnie bez \"v\" and \"V\"). Miîego dnia.")
  44. ))
  45.  
  46. (if (= @language "español")
  47. (
  48. ; Spanish strings 1.0 (16.9.00) by Dámaso D. Estévez <amidde@arrakis.es>
  49.  
  50. (set YEP "Sí")
  51. (set NOP "No")
  52. (set NEED "¡`Safe' requiere S.O. versión 2.0 o superior!\n")
  53. (set WELC ("\n\n\n\nBienvenido al guión instalador de `Safe' %s.\n(c)1998-2000 Zbigniew `Zeeball` Trzcionkowski\n\n¡Este guión instalará únicamente el fichero `Safe' y\nhará que se ejecute desde su fichero `user-startup'!" VER))
  54. (set WHER "Por favor, elija donde desea instalar el programa.")
  55. (set WHLP "¡El lugar donde debe estar!")
  56. (set CPNG "Copiando `Safe' en ")
  57. (set ADDG "Añadiendo `Safe' al fichero \"S:User-Startup\".")
  58. (set AHLP "¡Para comprobar el sistema cada vez que arranque!")
  59. (set QES1 "\n\n\n¿Desea activar el parche TCP?")
  60. (set Q1HE "Le permite detectar la actividad de troyanos/virus que abren consolas remotas en el dispositivo `TCP:'")
  61. (set QES2 "\n\n\n¿Desea renombrar `Ram disk:'?")
  62. (set QES3 "\n\n\n¿Desea saltarse la comprobación del\nvirus PolishPower durante el arranque?")
  63. (set Q2HE "Renombrar la unidad `Ram disk:' como `RAM:' puede ayudarle con algunos programas.")
  64. (set Q3HE "Le permite ahorrar 16/50 de segundo durante el arranque al no verificarse la presencia del virus PolishPower en memoria, pues éste siempre aparece con retraso...")
  65. (set MESS "En sistemas importantes, considere cambiar manualmente el nombre del fichero `Safe' por otro, y que no contenga, preferentemente los caracteres \"v\" y/o \"V\".  Que tenga un buen día.")
  66. ))
  67.  
  68.  
  69. (set app-name "Safe %s" VER)
  70.  
  71. (if(<(/(getversion)65536)37)(abort NEED))
  72.  
  73. (complete 0)
  74.  
  75. (run "SAFE OWNOUT")
  76. (run "QUICKTEST")
  77.  
  78. (complete 1)
  79.  
  80. (message (cat WELC))
  81.  
  82. (set dirk (askdir (prompt WHER) (help WHLP) (default "C:")))(set @default-dest dirk)
  83.  
  84. (copyfiles (prompt CPNG dirk) (source "safe") (dest dirk))
  85.  
  86. (complete 50)
  87.  
  88. (if(askbool(prompt QES1)(help Q1HE)(choices YEP NOP))(set PAR1 " TCPPATCH"))
  89.  
  90. (if(askbool(prompt QES2)(help Q2HE)(choices YEP NOP))(set PAR2 " RENRAM"))
  91.  
  92. (if(askbool(prompt QES3)(help Q3HE)(choices YEP NOP))(set PAR3 " NOPOLPOW"))
  93.  
  94. (startup "Safe" (prompt    ADDG) (help AHLP) (command ("%sSafe%s%s%s" dirk PAR1 PAR2 PAR3)))
  95.  
  96. (complete 100)
  97.  
  98. (exit MESS)
  99.